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Command Syntax 

step DATA constant- l[,constant-2j . . . © 

step DEF FNletter-1 (I etter-2) = expression © 

ALL 
step- 1 



DEL 



f[-step-2] ) 
{[, step-2]... J 



© 



step DIM letter-l(expression-l[,expression-2])[,letter-2(expression-3[,expression-4])] . . . © 



* DUMP 



step- 1 



([-step-2] ) 
[[, step-2]... J 



© 



step END© 

step FOR variable = expression- 1 TO expression-2 [STEP expression-3j ® 

step-1 GOSUB step-2 © 

[step-l] GO TO step-2 © 

step-1 IF relational-expression THEN step-2© 

step INPUT [FILE] variable- 1 [,variable-2] ... © 

[step] LET variable = expression © 



LIST 



[TELETYPE ] 

[/file-name/J 



© 



* LOAD \ 7 r .T " ' " " A® 
step NEXT variable © 



step OPEN /file-name/, | UTPUT|® 
[step] PRINT 




expression- 1 
k "character-string- 1 
step PRINT FILE expression- l[,expression-2]. . . © 
step READ variable- l[,variable-2] ... © 
step REM character-string © 
step RETURN © 
RUN © 
step STOP© 



,"1 fexpression-2 

character-string-2' 



© 
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1. INTRODUCTION 



The BASIC language and compiler were original ly developed 
at Dartmouth Col lege for time-sharing computer users with no 
previous knowledge of computers, as well as for users with con- 
siderable programming experience. Thus, BASIC is as useful to 
the businessman asit is to the scientist orengineer. A simple, 
straightforward language, BASIC closely resembles standard 
mathematical notation. In addition to its powerful arithmetic 
capability, italsocontainsediting features, simple input and 
output procedures, and complete language diagnostics. 

This manual is intended to serve as a tutorial guide for the 
new BASIC user and as a reference source for the experi- 
enced . Material is presented in a sequence that will en- 
able the reader to immediately use the SDS 940 time- 
sharing computer terminal to write simple programs, to gain 
confidence in the system, and then to progress to more dif- 
ficult programs. 

For clarity, several typographic conventions have been used 
throughout this manual. These are explained below. 

1. Underscored copy in an example represents copy pro- 
duced by the system in control of the computer. Unless 
otherwise indicated, copy that is not underscored in an 
example must be typed by the user. 

2. The ©notation appearing after some lines in the ex- 
amples indicates a carriage return. The carriage re- 
turn key is labeled RETURN on the Teletype keyboard. 
The user must depress the carriage return keyaftereach 
command to inform the computer that the current com- 
mand is terminated and a new one is to begin. The 
computer then upspaces the paper automatically. 

3. Non-printing control characters are represented in this 
manual by an alphabetic character and a superscript c 
(e.g., D c ). The user depresses the alphabetic key and 
the Control (CTRL) key simultaneously to obtain a non- 
printing character. For editing purposes some control 
characters will cause a symbol to be printed, but this 
symbol does not appear in the final version of an edited 
line. 

4. Other typographic conventions pertain to the method 
used in this manual to define the syntax of BASIC com- 
mands. These conventions are described in the para- 
graph titled "Basic Syntax Notation" later in thischapter. 

OPERATING PROCEDURES 

The standard procedure for gaining access to an SDS 940 
time-sharing computer center from a Teletype terminal is 
described in the SDS 940 Terminal User's Guide. This 
publication also includes information concerning the 940 
Executive System and the calling of the various subsystems 
available to the terminal user. The following paragraphs 
summarize the standard procedures as they apply to BASIC 
users. 



LOGIN 

To gain access to the computer, the following operating se- 
quence is performed: 

1 . If the FD-HD (Full Duplex-Half Duplex) switch is pres- 
ent, turn the switch to FD. This is a toggle switch with 
two locking positions. When the Teletype is not con- 
nected to the computer (sometimes called the Local Mode), 
this switch must be in the HD position. Whenever the 
Teletype is connected to the computer, this switch must 
be in the FD position. 

2. Press the ORIG (originate) key, located at the lower 
right corner of the console directly under the telephone 
dial. This key is depressed to obtain a dial tone before 
dialing the computer center. 

3. Dial the computer center number. When the computer 
accepts your call, the ringing will change to a high- 
pitched tone. There will then appear on the teletype 
a request that the user log in: 

PLEASE LOG IN: 



4. The user must then type his account number, password, 
and project code (if he has one) in the following format: 

PLEASE LOG IN: number password;name;project code 

Only persons who know the account number, password, 
and name, may log in under that particular combination. 
The following examples all il I ustrate acceptable practice. 



PLEASE LOG IN 



PLEASE LOG IN 



PLEASE LOG IN 



B4WORD;BROWN;DEMO© 
C6PW;SMITH © 



The word " BASIC" is an acronym for "Beginner's All-purpose 
Symbolic Instruction Code". 



The optional 1-12 character project code is provided 
for installations that have several programmers using 
the same account number. The project code is not 
checked for validity. 

If the user does not correctly type his account number, 
password, and name within a minute and a half, a mes- 
sage is transmitted instructing him to call the computer 
center for assistance. The computer will then discon- 
nect the user, and the dial and log-in procedure will 
have to be repeated. 

5. If the account number, password (nonprinting), and 

name are accepted by the computer, it wi 1 1 print READY, 
the date, and the time on one line and a dash at the 

beginning of the following line. 

READY date, time 



The dash indicates that the Executive is ready to accept 
a command. 
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6. In response to the dash, the user types 

BASIC & 

The Executive will respond with the symbol >, at the 
beginning of the next line, which means that the BASIC 
subsystem is in control and waiting for a command. 

ERROR CORRECTION 

If the user makes a mistake while typing and notices it im- 
mediately, he can correct the error at once. The BASIC 
language will accept the following edit characters: 

Character Function 

— The left arrow (located on the letter "O" while 

the shift key is depressed) is used to delete the 
most recent character typed. If the user notices 
that he has just mistyped a letter or a symbol, 
he strikes the — key, which tells BASIC to ig- 
nore the previous character. Striking this key 
repeatedly will delete a corresponding number 
of characters, but only to the start of the cur- 
rent line. 

For example, the command 
PRE — INT A+C— B © 
will appear to BASIC as 
PRINT A+B © 
while 

PRINT -LET X=Y© 

will appear to BASIC as 
LET X=Y© 

A command preceded by a step number (see "Writing Pro- 
grams in BASIC") may be deleted by retyping the step num- 
ber immediately fol lowed by a carriage return. A command 
preceded by a step number may be changed by retyping the 
step number and the new command, followed by a carriage 
return. 

ESCAPE 

The ESCAPE© key may be used at almost any time. It 
causes the subsystem in control to abort the current opera- 
tion and ask for a new command. Striking the ©key before 
terminating a command with ©aborts the command. BASIC 
responds by printing a > at the beginning of the next line. 

EXIT AND CONTINUE 

Striking the @ key twice in succession causes computer con- 
trol to return to the Executive. If the user wants to reenter 



In some 940 time-sharing system configurations the ALT 
MODE key is used instead of the ESCAPE key. Where© 
appears in this manual, ALT MODE may be substituted. 



BASIC without losing his program and if he has not called 
any other subsystem since leaving BASIC, he can type 
CONTINUE in response to the dash. This will return him 
to BASIC so that he can resume his work. 



LOG OUT 

When the user wishes to be disconnected from the computer, 
he types two consecutive escapes (to return control to the 
Executive) and then types 

LOGOUT © 

The computer will respond by printing the amount of com- 
puter time and hook-up (line) time charged to the user's ac- 
count since the previous log-in procedure was completed. 

BASIC ARITHMETIC COMPONENTS 

The arithmetic components of the BASIC language are con- 
stants, variables and expressions. These components are 
described in the following paragraphs. 

CONSTANTS 

Constants may be expressed in BASIC in three ways. First, 
they may be expressed as integers (whole numbers, e.g., 
1,7, 130,256). Constants may also be expressed in floating- 
point form; that is, as numbers with a decimal point (e. g. , 
1.5,10.0,155.55). Finally, constants may be written in 
scientific notation, which makes large numbers easier to 
express. For example, the number 53,000,000,000 may be 
written as 53E9. The letter E stands for "times ten to the 
power oP'; thus, 53E9 means 53 x 10^. 

In all cases, constants in BASIC may be thoughtofas being in 
floating-point form. This allows the computer to perform 
addition, subtraction, multiplication and division automat- 
ically and makes it unnecessary for the user to worry about 
positioning the decimal point. 

BASIC will accept and print a constant in integer form if 
the constant has 6 or fewer significant digits and if it has 
no fractional part. Otherwise, BASIC will round off the 
constant to the first seven significant digits and the con- 
stant will be expressed in scientific notation. The follow- 
ing examples illustrate these rules: 

>PRINT 12345678912© 
1.234568E+10 

>PRINT 123456789.0© 
1 .234568E+08 

>PRINT 123456789.23® 
1 .234568E+08 

>ppiMj -12345. 1E2^ 
-1.23451E+06 

>PRINT 23456E10© 
2.3456E+14 
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VARIABLES 

The numerical value of a constant is always the number itself. 
BASIC also permits the user to use a symbol to represent a 
number. Such symbols are called variables because the 
value of the symbol may be changed. Associated with each 
variable is a place in computer memory where the defined 
value of the variable is stored. In BASIC, a variable may 
be a single letter or a letter followed by a number. For 
example, some legal variables are 

B 
C 
Al 
Z5 

and some illegal variables are 

1 B (first character is not a letter) 

BA (second character is not a digit) 

A35 (too many characters) 

It is often convenient to keep data in a list. Such a list is 
called an array. The individual values in the list are called 
array elements. We refer to an array element by using the 
name of the array and the position of the element in the 
array. For example, we can refer to the fourth element in 
array A by writing A(4). In this example, the 4 is called 
the subscript. 

When the array has only one "dimension", it is often called 
a vector or a linear array. However, arrays may have more 
than one dimension. A two-dimensional array, often called 
a matrix , may be thought of as having columns and rows. 
There is always one subscript for each dimension; thus, a 
two-dimensional array is written as A(X,Y)= where X rep- 
resents a row number and Y represents the column number. 

Note that the name of an array must be only one letter, 
while a subscript may be any evaluatable expression, which 
may also include an array element. (Expressions are dis- 
cussed below. ) 

As a further example of matrix notation, consider thefo I low- 
ing chart, which lists the expenses for a four-day car trip: 



Column 



1 



Row 



^V. Date 










Item ^\^ 


June 5 


June 6 


June 7 


June 8 


Gasoline, 










oil 


21.29 


20.84 


19.42 


6.08 


Tolls 


1.32 


.86 


.40 


.07 


Food 


11.18 


12.82 


14.39 


5.06 


Lodging 


10.05 


12.79 


10.35 


.00 


Misc. 


1.35 


.90 


.44 


.10 



Thus, the amount spent for food on June 8 would be repre- 
sented by P(3,4). 



EXPRESSIONS 

Arithmetic Expressions 

Arithmetic expressions are formed by combining variables 
and/or numbers with arithmetic operators, as in mathematical 
formulas. There are six arithmetic operators in BASIC: 

- Negation (a unary operator) 
t Exponentiation 
* Multiplication 
/ Division 
+ Addition 

- Subtraction 



binary operators 



If we consider the chart to be a two-dimensional array called 
P, the amount spent on June 5 for lodging would be repre- 
sented by P(4,l). The first subscript always represents the 

m,>, .-.i.i-nUm- ...L?l« ll -~,-,,„,J ,,,L,,,:-4, = „„t. lL^ ~.-.l...~„ 

l\J11 IIUIIIUV,!, Will IC I I IC 3CI.UI IU JUUJ^I I pi I C|JI CSC I 113 I I IC LUIUMII I. 



The following are examples of legal arithmetic expressions: 

Expression Meaning 

F+H F plus H 

D + A + X D plus A plus X 

C - A(3) C minus the third element of A 

Q * -5 Q times minus 5 

X/Y X divided by Y 2 

Q I 2 Q to the power of 2 (or Q ) 

P I R P to the power of R (or PR) 

X/Y + 6 X divided by Y, plus 6 

In the last example in the preceding table, the order of 
computation is not clear, i.e., the expression could have 
been interpreted as 

X divided by the quantity Y + 6 



the quantity X/Y plus 6 

To make sure that the computer evaluates the expression 
the way the user meant it to be evaluated, there is an 
established rule of precedence: 

Exponentiation is always performed before negation 
and functions, which are always calculated before 
multiplication and division, which are always calcu- 
lated before addition and subtraction. The computer 
calculates from left to right if operators of the same 
precedence (e.g., multiplication and division) appear 
in the same line. 

To alter this order, parentheses must be used. Thus, to 
represent 

X divided by the quantity Y + 6 

we must write 

X/(Y + 6) 

Otherwise, according to the precedence rules it would be 
interpreted as "the quantity X/Y plus 6" because division 



BASIC Arithmetic Components 



The following are examples of precedence in expressions: 

Expression Interpretation 

A+B*C A plus the quantity B times C. 

(A+B)*C C times the quantity A plus B. 

Z-Y/X+W Z minus the quantity Y divided by X, 

plusW. 

(Z-Y)/(X+W) the quantity Z minus Y divided by the 
quantity X plus W. 

X t 2+Y X to the power of 2, plus Y 

X f -(2+Y) X to the negative power of the quantity 2 

plus Y. 

Mathematical Functions 

The mathematical functions available in BASIC are: 

SIN (expression) sine of expression in radians 

COS(expression) cosine of expression in radians 

TAN(expression) tangent of expression in radians 

ATN(expression) arc tan of expression in radians 

EXP(expression) natural exponent of expression 

A BS (expression) absolute value of expression 

LOG(expression) natural log of expression 

SQR(expression) square root of expression 

LGT(expression) log base 10 of expression 

I NT (expression) integer part of expression 

RND random number 

The expression enclosed in parentheses is called the argument . 
It may be any arithmetic expression, e.g., SQR(A*B). The 
arithmetic expression may include a function also, e.g., 
COS(N*X + SIN (T)) (a more complete discussion of func- 
tions is contained in Chapter 3). 

Relational Expressions 

A relational expression consists of two arithmetic expressions 
separated by one of the relational operators. The relational 
operators available in BASIC are 

Operator Relation 



= 


equal to 


> 


greater than 


>= 


greater than or equal to 


< 


less than 


<= 


less than or equal to 


<> 


not equal to 



In BASIC, a relational expression is either"true" or"false", 
depending on whether the answer to the question implied 
by the relational expression is"yes" or "no", respectively. 



For example, each of the following relational expressions 
imply a different question: 

Relational expression Question 

X > 5 Is the value of the variable X 

greater than the constant 5? 

A < > B Are the values of the variables 

A and B unequal? 

Z< = Y f K Is the value of the variable Z 

either less than or equal to the 
value of the variable Y raised 
to the power of K? 

If the answer to the question is"yes", the relational expres- 
sion is "true"; if the answer is "no", the relational expres- 
sion is "false". 

Evaluatable Expressions 

An evaluatable expression is an arithmetic expression or a 
relational expression for which the values of all variables 
contained within the expression are known to BASIC at the 
time the command in which the expression appears is exe- 
cuted. In order for the value of a variable to be known, the 
variable must be defined (or" declared"). Variables may be 
declared by the execution of the following BASIC commands: 

LET 

READ and DATA (used together) 

INPUT 

These commands are described in Chapter 2. 

BASIC SYNTAX NOTATION 

The following paragraphs describe the notation used in this 
manual to define the syntax of the BASIC language. 

1. A "notation variable" is used to represent a variable 
element of the BASIC language. A notation variable 
consists of lower-case letters, lower-case letters in 
combination with hyphens, or lower-case letters in 
combination with hyphens and digits (of which the first 
character is a letter). For example, 

variable 
denotes the occurrence of a BASIC variable. 

2. A "notation constant" denotes the literal occurrence of 
the characters represented. A notation constant con- 
sists either of all capital letters or of a special charac- 
ter or symbol. For example, 

LET variable - expression © 

denotes the literal occurrence of the word LET, fol- 
lowed by a BASIC variable, the literal occurrence of 
an equals sign, a BASIC arithmetic expression, and 
the literal occurrence of a carriage return. 
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5. 



7. 



The term "syntactical unit" (used in subsequent rules) 
is defined as a single notation variable or constant, or 
as any collection of notation variables, notation con- 
stants, BASIC language symbols, and reserved words 
surrounded by braces or brackets. 

Braces] lare used to denote a grouping. For example, 
LOAD 



TELETYPE 

/file- name/ 



The vertical stacking of syntactical units indicates that 
a choice is to be made. The above example indicates 
that the word LOAD must be followed by either the 
word TELETYPE or a slash character followed by a 
file name, followed by a second slash character. 

Brackets [ ] denote options. Anything enclosed in 
brackets may appear one time or may not appear at all. 
For example, 

[step-1] GO TO step-2 © 

denotes that the words GO TO may or may not be 
preceded by a step number; however, the words GO 
TO must be followed by a step number and a carriage 
return. 

Elipsis marks . . . denote the occurrence of the imme- 
diately preceding syntactical unit one or more time in 
succession. For example, 



expression-! [, expression-2]. 



© 



denotes that the variable "expression-1 " must occur; 
however, the variable "expression-2" may or may not 
occur since it is surrounded by brackets. If expres- 
sion-2 does occur, it may be repeated one or more 
times (with a comma preceding each occurrence), 
each occurrence may have a unique form, and the 
last occurrence must be followed by a carriage return. 

The character "i" is used as a collective reference 
designator when a syntactical unit may appear any 
number of times in succession. For example, 

expression-i 

denotes any of the expressions in the sample given 
above for rule 6. 



BASIC NOTATION VARIABLES 

The common variables used in this manual to define the 
syntax of the BASIC language are described in the following 
table. 



Notation variable Meaning 



constant 
variable 
element 



a BASIC constant (see "Constants") 

a BASIC variable (see "Variables") 

an element of an array (see" Vari- 
ables") identified by its position in 
the array as in 

1 I pynroff iftr>-/ ll 



Notation Variable 



functi 



expression 



Meaning 

a mathematical function (see "Math- 
ematical Functions") of the general 
form 

SIN 

COS 

TAN 

ATN 

EXP 

ABS ► (expression) 

LOG 

SQR 

LGT 

INT 

RND 

an arithmetic expression (see "Arith- 
metic Expressions") of the general 
form 



constant-1 
variable-1 
element-1 
function-1 



+ 



constant-2 
variable-2 
element-2 
function-2 . 



ici ier \expressio 



' L> 



>ress!on-z 



relational-expression a relational expression (see "Rela- 
tional Expressions") of the general 
form 

> 
expression-1 < >= ► expression-2 
< 

< = 
<> 



BASIC NOTATION CONSTANTS 

The notation constants of the BASIC language consist of 
command keywords, function identifiers, operators, and 
delimiters. 

Command Keywords 

The command keywords in the BASIC language are 
Keyword Use 

DATA defines data for a READ command 

DEF defines a nonstandard function 

DEL deletes a portion of a program 

DIM defines the dimensions of an array 

DUMP designates portion of a program to be saved 

END identifies the end of a program 

FILE specifies a system file 

FN used with DEF 

FOR part of FOR command 

GO part of GO TO command 

GOSUB calls a subroutine 

IF conditional GO TO command 

INPUT specifies Teletype or input file with OPEN 

LET arithmetic assianment 
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Keyword Use 



Delimiters 



LIST lists portion of program 

LOAD specifies program loading 

NEXT terminates FOR command group 

OPEN opens file for input or output 

OUTPUT specifies output file with OPEN command 

PRINT prints data on teletype or on file 

READ accepts data from DATA command 

REM inserts documentary comments 

RETURN terminates subprogram 

RUN begins execution 

STEP part of FOR command 

STOP terminates program execution 

TELETYPE designates remote terminal 

THEN part of IF command 

TO part of FOR and GO TO commands 

Function Identifiers 

The following function identifiers are a standard part of 
the BASIC language. 



ABS 
LGT 



ATN COS 
LOG RND 



EXP 
SIN 



INT 

SQR TAN 



Other function identifiers maybe declared by the program- 
mer, as described in Chapter 3. 

Operators 

The operators included in the BASIC language are the arith- 
metic and relational operators. (See "Arithmetic Expressions" 
and "Relational Expressions".) Note that the equal to (=) 
operator is a replacement operator (instead of a relational 
operator) in the LET, FOR, and DEF commands. 



Certain special characters are used as separators and as other 
types of delimiters. The BASIC delimiters are 

Character Use 

, separates elements of a list 

; separates elements of a formatted line 

( ) encloses array subscripts and controls the 

evaluation of expressions 

® terminates a command 

" denotes the beginning or the end of a text 

character string 

blank ignored (except in text) 

It is important to note that blanks are ignored when they 
appear within a keyword, a constant, or a variable name. 
(For the purpose of this discussion, the symbol for a blank 
isD). The following example demonstrates the general rules. 

35n5dPRDlNTn"DSAMPLEDTEXTD ,, DBn8 
t ♦ t ft t t t t 



ignored 
blanks 



these blanks are ignored 
part of text blanks 



In the above example, "B" and "8" are interpreted as the 
variable "B8". 

Note that blanks maybe eliminated entirely if the program- 
mer is not concerned with the readability of the printed 
copy. Furthermore, since each BASIC command is limited 
to a single line of 80 characters, the completion of a com- 
plex command may be more important than its readability. 
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2. BASIC COMMANDS 



SINGLE COMMANDS IN BASIC 

The BASIC language allows the remote Teletype terminal to 
be used as an extremely powerful desk calculator to evalu- 
ate complicated mathematical expressions and to reduce 
data that requires involved calculations. Two commands 
enable the user to express almost any mathematical expres- 
sion -PRINT and LET. 

PRINT 

The PRINT command causes BASIC to print the value of an 
expression. The user types the word PRINT and the expres- 
sion he wishes to evaluate (followed by a carriage return). 
The computer will then issue a line feed and print the value 
of the expression. The format of the PRINT command used 
for this operation is 

PRINT expression © 

Example: 

>PRINT 7.56*8.73 © 
65.9988 

Note that underlined copy is that which is generated by the 
computer. Several expressions can be evaluated with one 
PRINT command by separating the expression with commas. 
The format of the PRINT command used for successive evalu- 
ation and printing is 

PRINT expression-1 [_, expression-2j . . . © 

Example: 

>PRINT 5*6, 7+8+40,45/9® 
30 55 5_ 

Text can also be printed by enclosing the characters to be 
printed in quotation marks according to the format 

PRINT "character-string" © 

BASIC will cause the computer to print exactly what appears 
between the quotation marks, e.g., 

>PRINT "THIS MESSAGE INCLUDES BLANKS" © 
THIS MESSAGE INCLUDES BLANKS 

the PRINT command can also be used to type text and 
val ues of expressions, e.g., 

>PRINT "A = " 5+6 © 
A = 11 

More elaborate output formats can be constructed as de- 
scribed in Chapter 4. 

LET or REPLACEMENT 

If a variable is used as part of an expression in the PRINT 
command, the user must first assign a value to the variable. 
The LET command is used in other BASIC systems (notably, 
the Dartmouth BASIC compiler) to assign the value of an 
expression to a variable. In 940 BASIC, LET is not required 
but is accepted to preserve compatibility with these systems. 



The format of the replacement statement which assigns the 
value of an expression to a variable, is 

variable = expression © 



LET variable = expression © 
For example, the command 

X = 2+3 © 
assigns the value 5 to the variable X; the command 

Y = 10 © 
assigns the value 10 to the variable Y; and the command 

A(5) = 9 © 
assigns the value 9 to the fifth element of array A. 

Once the variable has a value, it may be used in a PRINT 
command, e.g., 

>A = 5 © 
>PRINT A© 
_5 

>B = -4 © 
>PRINT B © 

zi 

>PRINT "A + B =" A + B © 
A + B = 1 

A replacement statement can be used to change the value 
of a variable at any time, e.g., 

>A = 5 © 

>PRINT "A =" A© 

A =5 



>A - A + 1 © 

>PRINT "NOW A =" A © 

NOW A = 6 



WRITING PROGRAMS IN BASIC 

The foregoing concerns some of the things BASIC can do 
when commands are entered and executed one at a time. 
This discussion of BASIC continues by introducing a second 
way of using it, that is, as a means for writing and storing 
computer programs for future execution. 

A program is composed of commands (steps) that are to be 
used in solving a problem. For example, consider the fol- 
lowing steps of a program that calculates the hypotenuse of 
a right triangle according to the formula: 

HYPOTENUSE - \/(side l) 2 + (side 2) 2 

>100 A = 4 © 

>1 10 B - 3 © 

>120C = SQR(A t 2 + B t 2) © 

>130 PRINT "A="A / "B="B, "C="C© 

>RUN © 
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Note that each step has a unique step number (which may 
be any integer in the range 1 through 99999). The presence 
of the step numbers tells BASIC that these steps are not to 
be immediately executed, but are to make up a program. 
When the RUN command is given, telling the computer to 
execute the program, the steps are executed one at a time 
in ascending numerical sequence by step number. The re- 
sult printed by the computer would be: 



A= 4 



B= 3 



C= 5 



Remember that the = sign in the program means replacement 
not equality. Thus, step 100 means "assign the value 4 
to A" . 

The following program calculates and prints the area and 
volume of a sphere: 

>200 P = 3.14 © 

>300 R = 2 © 

>400 A=4*P*R|2© 

>500 V = (4/3) * P * R t 3 ® 

>600 PRINT R, A, V© 

>RUN© 

When the RUN command is given, BASIC will print: 

_2_ 50.24 33.49333 

Although BASIC executes commands according to the nu- 
merical sequence of step numbers, the steps of a BASIC 
program need not be prepared in numerical sequence. For 
example, the above program could have been prepared as 

>200 P = 3.14© 

>300 A = 4 * P * R t 2 © 

>400V = (4/3) * P* R t 3© 

>500 PRINT R, A, V © 

>250 R = 2 © 

>RUN© 

and the results will be identical. 

GOTO 

As we have seen, BASiC executes the steps of a program in 
ascending numerical sequence by step number. However, 
in writing programs it is sometimes necessary to change the 
normal sequence of execution. This can be accomplished 
by using the GO TO command, which has the format 

[step-l] GO TO step-2 © 

where 

step-l is the optional step number of the GO TO 

command. If step-l is not specified, BASIC be- 
gins executing commands (beginning with step-2) 
immediately after the carriage return. 

step-2 is the step number of the command that is 

to be executed next (instead of the command 
with the next step number that is numerically 
higher than sfep-I). 

Examples: 

GOTO 100© 
385 GO TO 215© 



It is often convenient to GO TO a step only under certain 
conditions. This type of statement is called the IF (or 
conditional GO TO) command, which has the format 

step-l IF relational-expression THEN step-2 © 

This command means, "If the relational expression is true, 
go to step-2 for the next command; otherwise (i.e., if the 
relational expression is false) go to the next step number in 
numerical sequence after step-l". For example, if we want 
to say, "If X is greater than 5, go to Step 100", we would 
write 

70 IF X> 5 THEN 100© 

Some other examples are 

100 IF A = 10 THEN 500© 
500 IF C(5) > 10 THEN 2300 © 
2300 IF D<= E THEN 100© 

The following program solves a quadratic equation of the 
form ax* + bx + c = 0, by using the formulas: 



Y - 


-b + V b - 4ac 


"l 


2a 


X. = 


-b-Vb 2 -4ac 



>100 A =5© 

>200 B = 6 © 

>300 C = 7 © 

>350 D=Bt2-4*A*C© 

>400 IF D < then 700 © 

>450 XI - (-B + SQR(D)) / (2 * A)® 

>500 X2 = (-B - SQR(D)) / (2 * A) © 

>550 PRINT XI, X2© 

>600 GO TO 750 © 

>700 PRINT "NO REAL ROOTS" © 

>750 STOP © 

>GOTO 100 © 

Execution of the above program begins immediately after 
the carriage return following the second GO TO command. 
Note that in the example, the second GO TO command 
could have been used to start execution at any step, where- 
as the RUN command always causes execution to begin with 
the lowest-numbered step. Note also that step 400 is a 
conditional GO TO command. It tells BASIC to skip the 
intervening steps and execute step 700 only if the discrimi- 
nant (D) is less than zero. If the discriminant is not less 
than zero the next command (step 450) is executed after 
step 400. 



DATA/READ 

Values can be assigned to variables in several ways. The 
LET statement is one method. Another method involves 
the combined use of the DATA and READ commands. 
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All the constants that are to be assigned to variables through- 
out the program are written together in a DATA command, 
which has the format 

step DATA constant- 1 [, constant-2]. . .© 

Examples: 

125 DATA 5, 10, 15© 

150 DATA 100,0,4E2,4.2© 

345 DATA 1.1,1.7, 34902,33.367E-15 © 

Similarly, the READ command has the format 

step READ variable- 1 [, variable-2]. . .© 

Examples: 

40 READ D © 

50 READ A1,A2© 

60READX(1),X(2),X(3)© 

Each time a READ statement appears, the computer auto- 
matically assigns each constant-i in the DATA list to the 
corresponding variable-i in that READ statement. For ex- 
ample, the commands 

100 READ A,B,C © 
200 DATA 1 , 2, 3 © 

would be equivalent to the commands 

100 A = 1 © 
150 B = 2 © 
200 C = 3 © 

Generally a program uses more than one value for a vari- 
able in order to prevent excessive use of constants and as- 
signments. For example, consider the program 

>10 G = 100® 

>20 P = 20 © 

>30 D = G * P* .01© 

>40 A = G - D © 

>50 PRINT D,A© 

>55 G = 150© 

>60 P - 5 © 

>70 D = G * P * .01© 

>80 A = G - D© 

>90 PRINT D,A© 

Another way of writing this program using the READ and 
DATA commands is 

> 10 READ G,P© 

> 30 D = G * P * .01© 

> 40 A = G - D© 

> 50 PRINT D,A© 

> 60 READ G,P© 

> 70 D = G * P * .01© 

> 80 A = G - D® 

> 90 PRINT D,A© 

MOO DATA 100,20, 150,5© 

Note that all the data that is to be assigned to G and P is 

nr>\A/ Irx-nf^rl in ctpn TDD 



INPUT 

There is a third method of assigning values to variables which 
may be done at execution time, contrary to the other meth- 
ods mentioned. To use the READ and DATA commands or the 
LET command, the user must assign values to all variables 
when the program is written. To assign values to variables 
at execution time the user may use the INPUT command, 
which has the format 

step INPUT variable-1 [, variable-2]. . .© 

Examples: 

400 INPUT A,B,C, D, E© 
500 INPUT X,Y,Z1,Z2© 

Each time the input command is encountered during exe- 
cution, the program is halted and a ? is output to the ter- 
minal. At that time, numbers corresponding to the variable 
list, separated by commas, must be typed in, terminating 
with a carriage return. The values are automatically 
assigned to the respective variables and execution is 
continued. 

Now the sample program given for the READ and DATA 
commands could be written as: 

>10 INPUT G, P© 
>20 D = G * P * .01© 
>30 A = G - D © 
>40 PRINT D,A © 
>50 INPUT G,P © 
>60 D = G * P * .01 © 
>70 A = G - D © 
>80 PRINT D,A© 
>RUN© 

When the RUN command is given, BASIC executes the first 
INPUT command and waits for the values of G and P, and 
a carriage return. Upon receiving these, execution con- 
tinues until the next input command. Output would appear 
as 



? 100,20© 
20 

? 150,5© 
7.5 



80 



142.5 



WRITING PROGRAM LOOPS 

Note that the first four steps of the sample program for the 
INPUT command are exactly like the second four steps. This 
makes it possible to represent the program in the following 
way: 

>10 READ G, P© 

>20 D = G * P* .01© 

>30 A = G - D © 

>40 PRINT D,A© 

>50 GOTO 10© 

>60 DATA 100,20,150,5© 

>RIIN(^) 



Writing Programs in BASIC 



The computer will perform steps 10 through 50 in the normal 
fashion, but after completing step 50 it will go back to 
step 10 and repeat steps 10 through 50. When the computer 
comes to step 50 once more, step 50 sends it back to step 10 
again. This process is repeated over and over until all data 
defined in the DATA command (or any higher numbered 
DATA command) has been used. At this time, the message 
"OUT OF DATA 10" would be typed. This technique (often 
called a loop) is perhaps the single most important feature 
in programming. The following example shows all the steps 
that are necessary to set up a controlled loop to print all the 
numbers between 1 and 100. 

>10 I = 1© 

>15 IF I < 100 THEN 60© 

>20 PRINT I® 

>45 I = I + 1 © 

>50 GO TO 15© 

X>0 PRINT "FINISHED"© 



First, a variable was selected to be the counter (I). Second, 
an initial value was assigned to the counter variable (1). 
Third, the value of the counter variable was tested to see if 
it was finished (I > 100). Fourth, the value of the counter 
variable was increased each time the loop was repeated 
(1 = 1+ 1). 

FOR/NEXT 

A second (and briefer) method of constructing program loops 
is to use the FOR and NEXT commands. The FOR command, 
which has the format 

step FOR variable = expression-1 TO expression-2 © 

assigns the value of expression-1 to the variable and uses 
expression-2 as an upper limit for the value of the variable. 
The NEXT command, which has the format 

step NEXT variable© 

must appear somewhere after the FOR command. The vari- 
able must be the same variable given in the FOR command. 
The purpose of NEXT is to increment the value of the variabl* 
(by 1) and compare its incremented value with the value of 
expression-2 given in the previous FOR command. If the 
incremented variable is less than or equal to expression-2, 
BASIC interprets the NEXT command as, "GO TO the pre- 
vious FOR command". However, if the incremented value 
of the variable is greater than the value of expression-2 
given in the FOR command, BASIC interprets the NEXT 
command as, "GO TO the next step in numerical sequence 
after the NEXT command". 

The FOR loop is always executed at least once, even when 
expression-1 is initially greater than expression-2. 

Thus, using the FOR and NEXT commands, the program 
given above could also be written as: 

>10 FOR I = 1 TO 100 © 

>20 PRINT I © 

>30 NEXT I © 

>40 PRINT "FINISHED" © 

>RUN © 



Exactly the same looping procedure is followed; however, 
it happens automatically by using the FOR command, 
where 

I is the counter variable 

1 is the initial value of I 

I > 100 is the test for completion 

1 is the increment to be added to I. 

In this sample program the "body" of the loop consists of 
one step (step 20). The body of the loop may be any num- 
ber of steps, but it is always terminated by the NEXT com- 
mand. When the loop is finished the next step executed is 
the step following the NEXT command. 

In some program loops it is necessary to increment the 
counter variable by a value greater than 1. This can be ac- 
complished by inserting a LET command immediately before 
the NEXT command. For example, to find and print all even 
numbers in the range 50 through 76, the following program 
could be used: 

>10 FORX = 50 TO 76© 

>20 PRINT X © 

>25 X = X + 1 © 

>30 NEXT X © 

>40 PRINT "FINISHED"© 

>RUN© 

A simpler way of doing this is to use a STEP clause in the 
FOR command, as in the format 



step FOR variable 



expression -1 TO expression-2 

[STEP expression-3] © 



where expression-3 is the increment to be added to the 
variable when the NEXT command is executed. Thus, the 
above program can also be written as 

>10 FOR X = 50 TO 76 STEP 2 © 

>20 PRINT X© 

>30 NEXT X © 

>40 PRINT "FINISHED" © 

>RUN© 

According to the looping procedure 

X is the counter variable 

50 is the initial value of X 

X > 76 is the test for completion 

2 is the increment to be added to X. 

Note that the increment is assumed to be 1 unless a STEP 
clause is added to the FOR command. 

It is often useful to have loops within loops. These " nested" 
loops can be expressed with FOR and NEXT commands. In 
the following skeleton examples, the enlarged brackets mark 
the body of the loop. 
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Legal 



Illegal 



ForX 


— 


ForX 


ForY 




-ForY 


NEXT Y 


— 


NEXTX 


NEXT X L NEXT Y 


FORX 


i- FOR Z 


FORY 


rFOR Z 

Lnext z 


FOR Z 


NEXT Z 


- NEXT Z 


FOR W r 


- FORX 


NEXT W 


- FORY 


NEXT Y 


rFORX 
L NEXT X 


FOR Z 


NEXT Z 


- NEXTY 


NEXT X 




NEXTX 



USE OF SUBSCRIPTS 

The concept of subscripting and arrays becomes extremely 
useful in relation to programming loops. Consider the fol- 
lowing table, which lists the quantity of each type of item 
sold by each of five salesmen in one week. 











salesman 








Jones 


Smi 


th 


Brown 


Doe 


White 


Item 1 


40 


20 




37 


29 


42 


Item 2 


10 


16 




3 


21 


8 


Item 3 


35 


47 




29 


16 


33 



The price of each item is listed in the following table: 
Item Price 



1 


$1.25 


2 


$4.30 


3 


$2.50 



In the following discussion, the quantities of items in the 
first table are regarded as the two-dimensional array Q(I, S) 
where I is the item number (row reference) and S is the 
salesman (column reference). The prices of the items are 
regarded as the one-dimensional array P(I) where I is the 
item number. 

The following program calculates the total sales in dollars 
for each salesman using data from the preceding tables: 

>10 FOR I = 1 TO 3® 
>20 READ P(I)© 
>30 NEXT I © 
>40 FOR 1=1 TO 3© 

\irn cr^D c — 1 T/^i c 0\ 



>60 READ Q(I,S)© 

>70 NEXT S © 

>80 NEXT I © 

>90 FOR S = 1 TO 5 © 

>100T = © 

>110 FOR I = 1 TO 3© 

>120T = T + P(I) * Q(I,S)© 

>130 NEXT I© 

>140 PRINF'TOTAL SALES FOR SALESMAN" S,"$"T© 

>150 NEXT S© 

>200 DATA 125,4.30,2.50 © 

>21 DATA 40, 20, 37, 29, 42 © 

>220 DATA 10,16,3,21,8© 

>230 DATA 35, 47, 29, 16, 33 © 

>RUN © 

Steps 10 through 30 read in the values of the list P. Steps 
40 through 80 read in the values the table Q. Steps 90 
through 150 compute T (the total sales for each of the five 
salesmen) and print each answer as it is computed. The 
calculation for a single salesman takes place in steps 100 
through 130. In steps 90 through 150, the letter I stands 
for the item and the letter S stands for the salesman. 



DIM 



BASIC automatically provides 11 elements (locations in 
memory) for a one-dimensional array, so that the subscript 
may vary from to 10. If the user wants to allow for a longer 
array, he may specify its subscript range with the DIM (di- 
mension) command, which has the format 

step DIM array- 1 [, array- 2]. . .© 

where each array-i has the form 
letter-i (expression-i) 

Each expression-i must evaluate as zero or a positive inte- 
ger value, which specifies the upper subscript limit of the 
array-i as the value of the expression-i. (The lower sub- 
script limit is 0). 

Examples: 

10 DIM Q(59)© declares an array of 60 elements 
20 DIM B(A + X), Z(A(X)) © 

Similarly, the subscripts of a two-dimensional array may 
each vary from to 1 0. This allows for 11 x 1 1 or 121 ele- 
ments. If a larger table is desired, the user may use the 
DIM command with each array-i having the form 

letter-i (expression- 1, expression-2) 

Each expression-i must evaluate as zero or a positive inte- 
ger, which specifies the upper subscript limit for the corre- 
sponding dimension of the array-i. 

Examples: 

1 DIM Y(40, 50)© declares an array of 41 x 51 elements 

2 DIMX(Y,Z),A(1,1)@ 

3 DIMA(X(1),X(2))© 
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INPUT/OUTPUT COMMANDS 



PRINT FILE 



All data permanently stored at the computer installation is 
kept in files on a large disc memory system. Each user has 
his own files and file directory (for further description of 
files see the SDS 940 Terminal User's Guide). 

OPEN 

Often the values to be assigned to program variables are lo- 
cated in a permanent file. To read a permanent file, it must 
be in the user's file directory and it must be opened using 
the OPEN command. Similarly, program output may be writ- 
ten on a file ratherthan on theTeletype. Again, the file must 
appear in the user's file directory and must be opened using 
the OPEN command. The OPEN command has the format 

nDCM/ ,. z j INPUT (^ 

step OPE N/f ile-name/, j QUTPUT } ® 

where file-name is the name of a file in the user's file directory. 
Examples: 

10 OPEN/DATA1/, INPUT © 
20 OPEN/XYZ/, INPUT © 
30 OPEN/MASTER/, OUTPUT © 
40 OPE N/F 1/, OUTPUT© 

The OPEN command resets the file's location counter to its 
beginning so that the first value subsequently input from or 
output to the file will be the first value of the file. A file 
cannot be open for input and output simultaneously. 



Once the file is opened for output, the user may write on 
it using the PRINT FILE command, which has the format 

step PRINT FILE expression-1 [, expression -2j. . . © 

Each time the PRINT FILE command is encountered during 
execution, the value of each expression-i appearing in the 
list of expressions is appended to the file most recently 
opened for output in the same order as given in the expression 
list. 

Examples: 

70 PRINT FILE X,Y® 

80 PRINT FILE X + Z/100, 1 © 

The following small programs illustrate one method of uti- 
lizing data files. Briefly, the first program creates a master 
file consisting of an employee number, hourly rate, and the 
number of hours worked for each company employee. 

The second program reads the master file, calculates and 
prints the weekly salary for each employee (time and a half 
for overtime), and calculates total payroll. 

The third program reads the master file and calculates com- 
pany overtime. 

>110 OPEN/MASTER/, OUTPUT © 
>111 INPUT E,R,H© 
>H 2 PRINT FILE E, R, H © 
>113 IF E = 0THEN 110© 
>114END© 



INPUT FILE 

Once the file is opened for input, the user may read it by 
using the INPUT FILE command, which has the format 

step INPUT FILE variable- 1 [, variable-2]. . .© 

Each time the INPUT FILE command is encountered during 
execution, the next value-i appearing on the file most re- 
cently opened for input is read and assigned to the next 
variable-i in the list of variables. 

Examples: 

50 INPUT FILE X © 

60 INPUT FILE A1,B, Z© 

The following technique can be used to open a file for INPUT 
(OUTPUT) which had been opened for OUTPUT (INPUT). 



5 OPEN /A/, INPUT© 

10 INPUT FILE X,Y,Z© 

15 OPEN/B/, INPUT© 

20 INPUT FILE Q,R,S© 

25 OPEN/C/, INPUT© 

30 OPEN/B/, OUTPUT© 

35 PRINT FILE G,H,I,J © 



Opens /A/ for input 

Inputs data from /A/ 

Closes /A/, Open /B/ 
for input 

Inputs data from /B/ 

Closes /B/, Open /C/ 
(a dummy) for input 

Outputs data to file /B/ 



>209 

>210 

>211 

>212 

>213 

>214 

>215 

>216 

>217 

>218 
\oio 

>220 
>221 



S = 0© 

OPEN/MASTER/, INPUT ® 

INPUT FILE E,R,H © 

IF E =0THEN 220® 

IF H > 40 THEN 218© 

P = R* H© 

PRINT E,P© 

S =S + P© 

GO TO 211© 

P = 40 * R+ (H-40) * R * 1.5 © 

PRINT "TOTAL PAYROLL", S© 
END© 



>309 S -0© 

>310 OPEN/MASTER/, INPUT © 

>311 INPUT FILE E,R,H® 

>312 IF E = 0THEN 315® 

>313 IF H< 40 THEN 311© 

>314S = S + (H-40) © 

>315 GO TO 311© 

>316 PRINT "COMPANY OVERTIME", S © 

>317END© 

PRINT 

The PRINT command may be used simply and directly, as 
previously described, or it may be used in conjunction with 
output format options for the programmer who wants format- 
ted output. For this purpose, there are three format types: 
zoned, packed, and compressed. 
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Zoned Format 

The Teletype line is divided by BASIC into five zones of 
fifteen spaces each, which allows for the printing of up to 
five items per line. A comma is a signal to BASIC to move 
to the next print zone, or to the first print zone of the next 
line if it has just filled the fifth print zone. The termina- 
tion of a PRINT statement signals a new line (unless a 
comma is the last symbol). Each number occupies one zone, 
whereas text occupies an integer number of zones; i.e., if 
text occupies part of a zone, the rest of the zone is filled 
with blanks. If text runs through the fifth zone, part of it 
may be lost. 

Packed Format 

The user may specify that output is to be printed in packed 
format by separating the expressions with the semicolon 
instead of the comma. Whereas the comma causes BASIC 
to move to the next zone to print the next item, the semi- 
colon causes BASIC to move to the beginning of the next 
multiple of three characters to print the next answer. Thus, 
with packed output, the user can print eleven, three-digit 
numbers per line, eight, six-digit numbers per line or six, 
nine-digit numbers per line. 

Compressed Format 

If neither a comma nor a semicolon appears between expres- 
sions to be printed, the values will be printed without any 



separating spaces. Also, if two parts of text are separated 
only by the usual quotes, they will be printed without 
spaces. Similarly, if text is followed by an expression, 
without a comma or semicolon, the value will be printed 
immediately following the text (a blank replaces the plus 
sign for non-negative numbers). 



Examples: 



>1 


FOR X = 


= 1 TO 3© 


>2 


PRINT " 


X=' 


X,© 


>3 


NEXT X 


© 




>4 


END® 






>RUN© 






X = 


= 1 




X =2 



(zoned format) 



X = 3 



>2 PRINT "X=" X;® 

>RUN© 

X= 1 X =2 



X = 3 



(packed format) 



(compressed format) 



>2 PRINT "X=" X© 

>RUN© 

X= 1 

X = 2 



X = 3 

A more extensive demonstration of packed format is shown 
in Figure 1 . 



>100FORX= 100 TO 125© 

>110 PRINT X ; © 

>120 NEXTX© 

>130 END© 

>RUN® 



100 


101 


102 


103 


104 


105 


106 


107 


108 


109 


110 


111 


112 


113 


114 


115 


116 


117 


118 


119 


120 


121 



122 



123 124 125 



>100 FOR X = 100000 TO 100025 © 

>1 10 PRINT X ; © 

>120 NEXT X® 

>130 END® 

>RUN© 



100000 


100001 


100002 


100003 


100004 


100005 


100006 


100007 


100008 


100009 


100010 


100011 


100012 


100013 


100014 


100015 


100016 


100017 


100018 


100019 


100020 


100021 


100022 


100023 



100024 100025 

MOO FOR X = 1000000 TO 1000013® 

>1 10 PRINT X;® 

>120 NEXT X© 

>130 END© 

>RUN® 
1.E+06 1. 00000 1E+06 1.000002E+06 1.0000Q3E+06 1.000004E+06 
1.000005E+06 1.000006E+06 1.000007E+06 1.000008E+06 1.000009E+06 
1.00001E+06 1.00001 1E+06 1.000012E+06 1.000013E+06~ 



> 



Figure 1. Example of BASIC Packed Format 
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3. FUNCTIONS AND SUBROUTINES 



FUNCTIONS 

The standard functions that BASIC provides are listed under 

"Mathematical Functions" in Chapter 1. The manner in 

which they are used is very simple. To compute y= yl +x^ 
the programmer would write 

Y = SQR (1 +X t 2)® 

The expression enclosed in parentheses is called the argu- 
ment^ The other standard functions are used in this same 
way; that is, the function name is followed by the argu- 
ment enclosed in parentheses, as shown by the format 

function-name (expression) 

Examples: 

LOG(Y) 
SIN(Xt 2) 
ABS(X + Y + Z) 

Two additional functions that are in the BASIC repertory 
but which have not been described, are INT and RND 

INT 

The INT (integer) function is used to determine the integer 
part of a number that might not be a whole number. Thus 
INT (7.8) is equal to 7. As with the other functions, the 
argument of INT may be any expression. INT always op- 
erates by truncating the fractional part, whether the num- 
ber is positive or negative. 

One use of INT is to round numbers to the nearest integer. 
If the value of X, for example, is positive, it maybe rounded 
by using the statement INT(X + .5). If the value of X is neg- 
ative, however, the statement INT(X - .5) must be used, the 
reason being that a number like -7.8 rounded is -8 not -7. 
INT can be used to round to any number of decimal places. 
For positive values of X, for example, the statement 
INT(100*X + .5)/100 will round X to two decimal places. 

RND 

The RND function is a pseudo-random number generator. 
When called, it will produce a floating-point number with 
a value between zero and one. For example, the command 

PRINT RND.© 

would cause BASIC to print 
.502793 

When the function is called repeatedly, it will produce a 
sequence of pseudo-random numbers. For example, the 
command 

PRINT RND., RND., RND.© 

would cause BASIC to print 

.502793 .2311643 .3898417 



The same sequence of psuedo-random numbers will occur in 
every program that uses the RND function, which is useful 
for debugging. 



DEF 



The DEF command permits the user to define a function so 
he will not have to repeat a formula each time he uses it 
in his program. The name of a defined function must be 
three letters, the first two of which are FN. Thus the user 
may define up to 26 functions with DEF commands, that 
have the format 

step DEF FN letter-l(letter-2) = expression © 



letter-1 is the third letter of the user-defined 

function name. 

letter-2 denotes an unsubscripted variable that is 

initially set to the value of the argument used in 
the call for the user-defined function, letter-2 
is set equal to the value of the expression and is 
also returned as the result of the call for the user- 
defined function. 

expression may be any expression that can fit into 

one line. It may not include another user-defined 
function, but may include standard functions (like 
SIN and SQR) and may involve other variables 
besides the one denoting the argument of the func- 
tion. However, the variables used in the expres- 
sion must not be subscripted. 

Examples: 

25 DEF FNF(Z) = (Z*3. 14159265/180) © 

40 DEF FNL(X) = LOG (X) / LOG (10) © 

Thus, step 25 defines FNF as the function "sine of Z de- 
grees" and step 40 defines FNL as the function "!og-to-the- 
base-ten of X". 

The DEF command may occur anywhere in the program. In 
a program containing FNF as defined above, the variable 
Z takes on a new value each time the function FNF is 
called. The safest practice is to avoid using elsewhere in 
a program the same variable used in a DEF command to de- 
fine a function. 

As another example: 

60 DEF FNX(X) = SQR (X*X + Y*Y) © 

may be used to set up a function that computes the square 
root of the sum of the squares of X and Y. To use FNX, 
one might write the following: 

>10 Y = 30 © 

>20 SI =FNX(40)© 

In this case, SI is set to the value 50 as the result of 
step 20. 
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It should be noted that one does not need DEF unless the 
defined function must appear at two or more locations in 
the program. Thus, 

>10 DEF FNF(Z) = SIN(Z*P)© 
| >20 P = 3.14159265/180© 

>30 FOR X = TO 90 © ' 
>40 PRINT X, FNF(X)© 
>50 NEXT X© 
>60 END © 

might be more efficiently written as 

| >20 P = 3.14159265/180© 

>30 FOR X = TO 90 © 
>40 PRINT X, SIN(X*P)© 
>50 NEXTX© 
>60 END© 

to compute a table of values of the sine function in degrees. 

SUBPROGRAMS 

The use of DEF is limited to those cases where the value of 
the function can be computed within a single BASIC state- 
ment. Often much more complicated functions, or per- 
haps even sections of a program that are not functions, 
must be calculated at several places within the program. 
For this, the GOSUB command may be useful, which has 
the format 

step-1 GOSUB step-2 



Example: 

200 GOSUB 400© 

The effect of the GOSUB command is exactly the same as a 
GOTO command except that BASIC notes where the GOSUE 
command is in the program. As soon as a RETURN command 
is encountered, the computer automatically goes back to 
the command immediately following the most recently exe- 
cuted GOSUB command. As a skeleton example: 

>100X = 3© 

>110 GOSUB 400© 

>120 PRINT U, V, W© 

>200 X = 5 © 

>2 10 GOSUB 400 © 

>220 Z = U + 2*V + 3*W © 

>230 GO TO 440 © 

>400 U = X*X © 

>410V = X*X*X® 

>420 W = X*X*X*X+X*X*X+X*X+X© 

>430 RETURN © 

>440 END® 

When step 400 is entered by the GOSUB 400 in step 1 10, 
the computations in steps 400, 410, and 420 are performed, 
after which the computer goes back to step 120. When the 
subprogram is entered from step 210, the computer goes 
back to step 220 after step 430 is executed the second 
time. 
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4. PROGRAM PREPARATION AND EXECUTION 



PROGRAM INPUT FROM THE TELETYPE 

There are several methods for preparing a BASIC program 
for execution. The first method is to type the program di- 
rectly into BASIC. This is usually the procedure used for 
small and medium sized programs. For example: 

-BASIC® 

>100 PRINT "THIS IS A SORTING PROGRAM"© 

>110 INPUT N © 



MISCELLANEOUS BASIC COMMANDS 



REM 



An important part of any computer program is the description 
of what it does, and what data should be supplied. One of 
the ways a program can be "documented" is by supplying 
remarks along with the program itself. BASIC provides this 
capability with the REM (remark) command. For example, 
consider a program that calculates mean and standard de- 
viation according to the formula 



PROGRAM INPUT FROM PAPER TAPE 

It is often convenient as well as economical to type longer 
programs on paper tape while off line. To do this, the 
teletype is placed in (1) LOCAL MODE, (2) HALF DU- 
PLEX MODE, and (3) PAPER TAPE PUNCH ON. The 
statements are typed just as though the user were connected 
to the computer, with one exception. Following each line, 
the user must type a carriage return and a line feed. When 
connected to the computer, the user types only a carriage 
return and the computer performs the line feed. 

If the user has punched his program on a paper tape, he 
can enter the text into BASIC with the following procedure: 

-BASIC © 

>LOAD TELETYPE© 

After this, BASIC is waiting for the program; when the user 
turns on the paper tape reader, the program reads in. 

BASIC is unable to distinguish typed characters from those 
that are read from the paper tape reader. Therefore, an 
alternate way of entering a paper tape is to turn on the 
paper tape reader without using the LOAD command: 

-BASIC © 

(turn on reader) 

>100 PRINT "THIS IS A SORTING PROGRAM" 

>110 INPUT N 



PROGRAM ON FILE 



Mean 




E(x.) 2 - (2x.) 2 



N 



N-l 



MOO REM MEAN AND STANDARD DEVIATION® 

>110 S = 0© 

>120 Q = 0© 

>125 INPUT N® 

>130 FOR 1= 1 TO N® 

>140 INPUT A (I)© 

>150X =X + A(I)© 

>160Q =Q + A(I) * A (I)© 

>170 NEXT I© 

>180 PRINT "MEAN=" S/N © 

>190D = SQR(((Q-(S * S)/N))/(N-1))© 

>200 PRINT "SD=" D© 

>210 END® 

END 

An END command indicates the termination point of a pro- 
gram. When the END command is encountered, it causes 
BASIC to stop executing the program and to await further 
commands. 



RUN 



The user types RUN to begin execution. The program always 
begins with the smallest step numberand executes according 
to ascending step numbers. To begin execution in the 
middle of the program, the user ccn use the GO TO com- 
mand as a direct command. 



If the program to be run has been previously prepared and 
is now located in a file on the disc, the user may type the 
command LOAD to bring his program into memory. The 
format of the LOAD command is 

LOAD/file-name/® 

Examples: 

LOAD/PAYROLL/® 
LOAD/SORT/© 



STOP 

The STOP command is used to stop program execution. 
When the program execution halts at the STOP command, 

i-U^ .,,-„.• rv,„., ~: -~l «■ :_LI_- u_ . tl rr 

me <_>jgi inuv gaumiiiic icicvuiii vunuuici. iic muy men, 11 

he so desires, issue a command GO TO s, where s is the 
step number following the STOP command. The GO TO 
command will then cause execution to continue at step 
number s. 
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LIST 



To list all or some of the steps of a program, the user types 
a LIST command, which has the format 



LIST 



Examples: 



step-1 



[-step-2] 
[, step-2] 



© 



LIST© 
LIST 100© 
LIST 100-500© 

LIST 100, 200, 300© 



(list entire program) 

(list step 100) 

(list steps 100 through 

500) 
List steps 100, 200, 

and 300) 



DEL 



To delete one or more steps of a program, the user types a 
DEL command, which has the format 



DEL 



Examples: 



step-1 



ALL 

[-step-2] 
[, step-2] 



►© 



DEL ALL© 
DEL 100© 
DEL 100-500® 

DEL 100, 200, 300 © 



(delete entire program) 
(delete step 100) 
(delete steps 100 

through 500) 
(delete steps 100, 200, 
and 300) 



To delete one step, the user may simply type the step num- 
ber followed by a carriage return, e.g., 

> 125© 



DUMP 

To save a program on a permanent file, the user types a 
DUMP command, which has the format 



DUMP 



Examples: 



step-1 



[-step-2] 
[, step-2] 



DUMP© 

DUMP 100-210© 

DUMP 100, 200, 221© 



© 



(dump entire program) 
(dump steps 100 

through 210) 
(dump steps 100, 200 

and 221) 



In response to the DUMP command, BASIC will print 

ON: 

on the line following the DUMP command. The user then 
types the name of the file on which he wishes to dump the 
desired portion of the program. The appropriate file name 
must appear between slashes, as follows: 

/file-name/© 

In response to the user's designation of the file, BASIC de- 
termines whether the file name currently exists in the user's 
file directory. If the name does exist, BASIC will print 

OLD FILE 

on the following line; however, if the name does not exist, 
BASIC will add the name to the user'sfiledirector and print 

NEW FILE 
on the following line: 
Examples: 

>DUMP © 
ON:/SAVE/© 
OLD FILE 

>DUMP 100-120© 
QN:/PGM/© 
NEW FILE 

>DUMP 100, 200, 221 © 

ON:/Pl/© 

OLD FILE 
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INDEX 



I 



arithmetic 

components, 2, 3 
expressions, 3, 5 
operators, 3 

arrays, 3 

B 

blanks 

in commands, 6 
in messages, 7 



character set, BASIC, 
commands 

input/output, 12 

miscellaneous, 16, 17 

single, 7 
constants 

arithmetic, 2 

syntactical, 5 
CONTINUED 
correction, error, 2, 17 



DATA command, 8 

DEF (define function) command, 14 

DEL (delete) command, 17 

DIM (dimension) command, 1 1 

DUMP command, 17 

E 

elements of arrays, 3 
END command, 16 
error corrections, 2 
ESC (escape) key, 2 
evaluatable expressions, 4 
execution of Tograms 16 
exit from BASIC, 2 
expressions, 3, 5 

F 

files 

input from, 12 

output to, 12 

programs on, 16 

reading from, 12 

writing on, 12 
FOR command, 10 
format, Teletype output, 12, 13 
functions, 14, 4 



identifiers, 6 

IF command, 8 

INPUT command, 8 

INPUT FILE command, 12 

input 

of data, 8 

of information from files, 12 
of programs from paper tape, 16 
of programs from the Teletype, 16 

INT (integer) function, 14 

K 

keywords, 5 

L 

LET or Replacement command, 7 
LIST command, 17 
LOAD command, 16 
log- in procedure, 1 
log-out procedure, 2 

N 

NEXT command, 10 
notation, BASIC syntax, 4 
notation constants, BASIC, 5 
notation variables, BASIC, 5 



OPEN command, 12 
operating procedures, 1, 16 
operators, 6 
output 

formats, 12, 13 

of data, 7 



PRINT command, 7, 12 
PRINT FILE command, 12 
program 

execution, 16 

input from paper tape, 16 

input from the Teletype, 16 

I oops, 9 

preparation, 16 

termination, 16 
Programs 

BASIC, 7 

on files, 16 



GO TO command, 8 
GOSUB command, 15 



READ command, 8 
relational expressions, 4 
REM command, 16 
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RET (carriage return) key, 1 

RETURN command, 15 

RND (pseudo-random number) function, 14 

RUN command, 16 



single commands, 7 
STEP clause, 10 
step numbers, 8 
STOP command, 16 
subprograms, 15 
subscripts, 1 1 



THEN clause, 8 

V 

variables, arithmetic, 3 
variables, syntactical, 5 

W 

writing 

on files, 12 

on the Teletype, 7, 12, 13 
program loops, 9 
programs in BASIC, 7 
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